home *** CD-ROM | disk | FTP | other *** search
/ L' Effet Pommier 3 / L'Effet Pommier - Volume 03.iso / Programmation / Alpha ƒ / Tcl / ElectricAlias / Aliases / aliases next >
Text File  |  1994-06-18  |  3KB  |  71 lines
  1. # FILE: aliases
  2. #
  3. # DESC: Aliases for GLOBALLY applicable typing aids
  4. #
  5. # LAST UPDATE: 01/23/93 5:41:18 AM 
  6.  
  7.     electricAlias-var "" author "David C. Black"
  8.     electricAlias-var "" internet "black@mpd.tandem.com"
  9.     electricAlias-var "" genie "D.C.BLACK"
  10.     electricAlias-var "" haddr "6217 John Chisum Lane"
  11.     electricAlias-var "" hcity "Austin, Tx 78749-1838"
  12.     electricAlias-var "" waddr "14231 Tandem Blvd"
  13.     electricAlias-var "" wcity "Austin, Tx 78728-6699"
  14.     electricAlias-var "" inits "DCB"
  15.     electricAlias-var "" bc ""
  16.     electricAlias-var "" ec ""
  17.     electricAlias-var "" sep "ñ{bc}############################################################################\r"
  18.     electricAlias-var "" ___ "_____________________________________________________________________________\r"
  19.     electricAlias-var "" file {ñ╟set file [lindex [winNames] 0]╚}
  20.  
  21.     # The following examples use ñ{VARIABLE}'s
  22.     electricAlias-def "" Ñsig "ñ{author}"
  23.     electricAlias-def {} ⌐ "Copyright (C) ñ╟date year╚ by ñ{author}.  All rights reserved."
  24.     electricAlias-def {Ñ} # "ñ{sep}"
  25.     electricAlias-def {Ñ} Ñdisclaimer {
  26. ñ{bc} COPYRIGHT:
  27. ñ{bc}
  28. ñ{bc}    Copyright ⌐ ñ╟date year╚ by ñ{author}
  29. ñ{bc}    All rights reserved.
  30. ñ{bc}
  31. ñ{bc}    Redistribution and use in source and binary forms are permitted
  32. ñ{bc}    provided that the above copyright notice and this paragraph are
  33. ñ{bc}    duplicated in all such forms and that any documentation,
  34. ñ{bc}    advertising materials, and other materials related to such
  35. ñ{bc}    distribution and use acknowledge that the software was developed
  36. ñ{bc}    by ñ{author}.
  37. ñ{bc}
  38. ñ{bc}    THIS SOFTWARE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR
  39. ñ{bc}    IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
  40. ñ{bc}    WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
  41. ñ{bc}
  42. ñ{sep}
  43. }
  44.     electricAlias-def {Ñ} ÑAUTHOR {
  45. ñ{bc} AUTHOR
  46. ñ{bc}    
  47. ñ{bc}    ñ{author}
  48. ñ{bc}    Internet: ñ{internet}
  49. ñ{bc}    GEnie:    ñ{genie}
  50. ñ{bc}    USnail:   ñ{haddr}, ñ{hcity}
  51. ñ{bc}
  52. ñ{bc}###############################################################################
  53. }
  54.     electricAlias-def {Ñ} ÑHISTORY {
  55. ñ{bc} HISTORY
  56. ñ{bc}                  
  57. ñ{bc} modified who rev reason
  58. ñ{bc} -------- --- --- ------ 
  59. ñ{bc} ñ╟date short╚ DCB 1.0 Original
  60. ñ{bc}###############################################################################
  61. }
  62.     electricAlias-def {} ÑHISTORY {
  63. ñ{bc} ñ╟date short╚ DCB 
  64. ñ{bc}                  }
  65.     # The following examples use ñ╟TCL_COMMAND╚
  66.     electricAlias-def "" "Ñdate" "\bñ╟date short╚"
  67.     electricAlias-def "" "Ñtime" "\bñ╟date time╚"
  68.     electricAlias-def "" "Ñupdate" "LAST UPDATE: ñ╟mtime [now] short╚" 
  69.     electricAlias-def "" "UPDATE:" "UPDATE:ñ╟update╚"
  70.     electricAlias-def "" "Ñfile" {ñ{file}}
  71.